/*
 * Peralta Santa Anna Victor Miguel
 * Diciembre 2011
 * Stored Procedure:
 *
 * Borramos toda la información del usuario en la base de datos.
 */

CREATE OR REPLACE FUNCTION deleteAdministrador
	(
		nombreUsuario1 VARCHAR,
		contrasenia1		VARCHAR,
		contraseniaSistema1	VARCHAR
		
	) RETURNS BOOLEAN AS $$
	
		DECLARE duplicado VARCHAR;

		
	BEGIN
	
		select into duplicado scontrasenasistema 
		from administrador 
		where scontrasenasistema LIKE md5((contraseniaSistema)) limit 1;
		
		IF duplicado IS NULL THEN
			RETURN FALSE;
		ELSE
			
			delete from usuarios where susuario like nombreUsuario1 and scontrasena like contrasenia1;
		
			RETURN TRUE;
		END IF;	
		
		COMMIT;	
	END;
	
$$ LANGUAGE plpgsql;

--select deleteUsuario(1);

